Imports Microsoft.VisualBasic

Public Class OrdenCompra
    Private _numeroDeOrden As Integer
    Private _fechaDePedido As String
    Private _fechaDePago As String
    Private _fkRequisicion As String
    Private _nombreProveedor As String
    Private _Atencion As String
    Private _condPago As String
    Private _despachar As String
    Private _rutProv As String
    Private _Comprador As String
    Private _notas As String
    Private _arrayItemOC As ArrayList

    Public Sub New(ByVal numeroDeOrden As Integer, ByVal fechaDePedido As String, ByVal fechaDePago As String)
        Me._numeroDeOrden = numeroDeOrden
        Me._fechaDePedido = fechaDePedido
        Me._fechaDePago = fechaDePago
    End Sub

    Public Property NumeroDeOrden() As Integer
        Get
            Return _numeroDeOrden
        End Get

        Set(ByVal value As Integer)
            _numeroDeOrden = value
        End Set
    End Property

    Public Property FechaDePedido() As String
        Get
            Return _fechaDePedido
        End Get

        Set(ByVal value As String)
            _fechaDePedido = value
        End Set
    End Property

    Public Property FechaDePago() As String
        Get
            Return _fechaDePago
        End Get

        Set(ByVal value As String)
            _fechaDePago = value
        End Set
    End Property

    Public Property fkRequisicion() As String
        Get
            Return _fkRequisicion
        End Get

        Set(ByVal value As String)
            _fkRequisicion = value
        End Set
    End Property

    Public Property nombreProveedor() As String
        Get
            Return _nombreProveedor
        End Get

        Set(ByVal value As String)
            _nombreProveedor = value
        End Set
    End Property

    Public Property Atencion() As String
        Get
            Return _Atencion
        End Get

        Set(ByVal value As String)
            _Atencion = value
        End Set
    End Property

    Public Property condPago() As String
        Get
            Return _condPago
        End Get

        Set(ByVal value As String)
            _condPago = value
        End Set
    End Property

    Public Property despachar() As String
        Get
            Return _despachar
        End Get

        Set(ByVal value As String)
            _despachar = value
        End Set
    End Property

    Public Property rutProv() As String
        Get
            Return _rutProv
        End Get

        Set(ByVal value As String)
            _rutProv = value
        End Set
    End Property

    Public Property Comprador() As String
        Get
            Return _Comprador
        End Get

        Set(ByVal value As String)
            _Comprador = value
        End Set
    End Property

    Public Property notas() As String
        Get
            Return _notas
        End Get

        Set(ByVal value As String)
            _notas = value
        End Set
    End Property

    Public Property arrayItemOC() As ArrayList
        Get
            Return _arrayItemOC
        End Get

        Set(ByVal value As ArrayList)
            _arrayItemOC = value
        End Set
    End Property
End Class
